object BackgroundControls: TBackgroundControls Left = 205 Top = 125 BorderIcons = [] BorderStyle = bsDialog Caption = 'Background Controls' ClientHeight = 268 ClientWidth = 358 Font.Color = clWindowText Font.Height = -13 Font.Name = 'System' Font.Style = [] PixelsPerInch = 96 ShowHint = True TextHeight = 16 object TiledBitmap1: TTiledBitmap Left = 188 Top = 7 Width = 160 Height = 160 Hint = 'This is a TTiledBitmap control.' Bitmap.Data = { C2000000424DC200000000000000420000002800000010000000100000000100 04000000000080000000130B0000130B00000300000003000000000000008000 0000FF0000001111111111111111111111111111111111111111111111111111 1111111111111111111111111111111111111111111111111100011111111111 1211101111111111121110111111111112111011111111111122211111111111 1111111111111111111111111111111111111111111111111111111111111111 111111111111} end object FountainFill1: TFountainFill Left = 8 Top = 7 Width = 160 Height = 160 Hint = 'This is a TFountainFill control. Change the colors below.' FromColor = clBlue ToColor = clNavy end object ShadowButton1: TShadowButton Left = 224 Top = 210 Width = 89 Height = 33 Hint = 'Click me to make this window go away!' Cancel = True Caption = 'OK' Default = True ModalResult = 1 TabOrder = 0 end object GroupBox1: TGroupBox Left = 7 Top = 175 Width = 160 Height = 82 Caption = 'Colors' TabOrder = 1 object cycFrom: TODCycler Left = 12 Top = 24 Width = 137 Height = 21 Hint = 'Select the colors for the TFountainFill component.' Caption = '&From' Max = 3 TabOrder = 0 Value = 1 OnClick = cycClick OnPaint = cycPaint end object cycTo: TODCycler Left = 12 Top = 52 Width = 137 Height = 21 Hint = 'Select the colors for the TFountainFill component.' Caption = '&To' Max = 7 Min = 4 TabOrder = 1 Value = 7 OnClick = cycClick OnPaint = cycPaint end end end